home *** CD-ROM | disk | FTP | other *** search
/ Mac Mania 1 / MacMania 1.toast / Games / Games'More / C-D / DM_3000 / DM 3000 / card_14881.txt < prev    next >
Encoding:
Text File  |  1988-06-06  |  2.9 KB  |  133 lines
  1. -- card: 14881 from stack: in
  2. -- bmap block id: 16879
  3. -- flags: 4000
  4. -- background id: 2604
  5. -- name: OFFICE SUPPLIES
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: 2000
  11. -- rect: left=344 top=81 right=104 bottom=366
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 29019 / 29019
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: N/TO/OUT/DRUG
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   go to card id 3080
  23. end mouseUp
  24.  
  25.  
  26.  
  27.  
  28. -- part 2 (button)
  29. -- low flags: 00
  30. -- high flags: 2000
  31. -- rect: left=97 top=229 right=259 bottom=109
  32. -- title width / last selected line: 0
  33. -- icon id / first selected line: 0 / 0
  34. -- text alignment: 1
  35. -- font id: 0
  36. -- text size: 12
  37. -- style flags: 0
  38. -- line height: 16
  39. -- part name: GET/LIFE
  40. ----- HyperTalk script -----
  41. on mouseUp
  42.   global pocketbook
  43.   global inventory
  44.   if pocketbook >0 then
  45.     subtract 1 from pocketbook
  46.     put ", lifesavers" after inventory
  47.     put "You take a stale package of lifesavers." into Msg
  48.     wait 3 seconds
  49.     doMenu "Message"
  50.     put inventory into background field "ShowMe"
  51.     put pocketbook into background field "CountMe"
  52.   else
  53.     put "Deposit 1 Credit." into Msg
  54.     wait 3 seconds
  55.     doMenu "Message"
  56.   end if
  57. end mouseUp
  58.  
  59.  
  60.  
  61. -- part 3 (button)
  62. -- low flags: 00
  63. -- high flags: 2000
  64. -- rect: left=191 top=230 right=265 bottom=208
  65. -- title width / last selected line: 0
  66. -- icon id / first selected line: 0 / 0
  67. -- text alignment: 1
  68. -- font id: 0
  69. -- text size: 12
  70. -- style flags: 0
  71. -- line height: 16
  72. -- part name: GET/SHADES
  73. ----- HyperTalk script -----
  74. on mouseUp
  75.   global pocketbook
  76.   global inventory
  77.   if pocketbook >14 then
  78.     subtract 15 from pocketbook
  79.     put ", sunglasses" after inventory
  80.     put "You put on a pair of polarized shades." into Msg
  81.     wait 3 seconds
  82.     doMenu "Message"
  83.     put inventory into background field "ShowMe"
  84.     put pocketbook into background field "CountMe"
  85.   else
  86.     put "Deposit 15 Credits." into Msg
  87.     wait 3 seconds
  88.     doMenu "Message"
  89.   end if
  90. end mouseUp
  91.  
  92.  
  93.  
  94. -- part 4 (button)
  95. -- low flags: 00
  96. -- high flags: 2000
  97. -- rect: left=191 top=154 right=186 bottom=204
  98. -- title width / last selected line: 0
  99. -- icon id / first selected line: 0 / 0
  100. -- text alignment: 1
  101. -- font id: 0
  102. -- text size: 12
  103. -- style flags: 0
  104. -- line height: 16
  105. -- part name: GET/MAGAZINE
  106. ----- HyperTalk script -----
  107. on mouseUp
  108.   global pocketbook
  109.   global inventory
  110.   if pocketbook >1 then
  111.     subtract 2 from pocketbook
  112.     put ", magazine" after inventory
  113.     put "You buy a copy of a sleezy gossip magazine." into Msg
  114.     wait 3 seconds
  115.     doMenu "Message"
  116.     put inventory into background field "ShowMe"
  117.     put pocketbook into background field "CountMe"
  118.   else
  119.     put "Deposit 2 Credits." into Msg
  120.     wait 3 seconds
  121.     doMenu "Message"
  122.   end if
  123. end mouseUp
  124.  
  125.  
  126.  
  127. -- part contents for background part 6
  128. ----- text -----
  129. You are carrying: empty multicorder
  130.  
  131. -- part contents for background part 8
  132. ----- text -----
  133. 0